home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / sheerdns_traversal.nasl < prev    next >
Text File  |  2005-01-14  |  2KB  |  89 lines
  1. #
  2. # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
  3. #
  4. # See the Nessus Scripts License for details
  5. #
  6. # Ref:
  7. #  Date: Sun, 13 Apr 2003 18:00:13 +0200
  8. #  From: Jedi/Sector One <j@pureftpd.org>
  9. #  To: bugtraq@securityfocus.com
  10. #  Subject: Multiple vulnerabilities in SheerDNS
  11.  
  12.  
  13. if(description)
  14. {
  15.  script_id(11535);
  16.  script_bugtraq_id(7335, 7336);
  17.  script_version ("$Revision: 1.5 $");
  18.  
  19.  
  20.  name["english"] = "SheerDNS directory traversal";
  21.  script_name(english:name["english"]);
  22.  
  23.  desc["english"] = "
  24. The remote server seems to be running SheerDNS 1.0.0 or older.
  25.  
  26. This version is vulnerable to several flaws allowing :
  27.     - A remote attacker to read certain files with predefined names
  28.       (A, PTR, CNAME, ...)
  29.  
  30.     - A local attacker to read the first line of arbitrary files with the 
  31.       privileges of the DNS server (typically root)
  32.  
  33.     - A local attacker to execute arbitrary code through a buffer overflow
  34.  
  35. Solution : Upgrade to SheerDNS 1.0.1 or disable this service
  36. Risk factor : Low (remotely) / High (locally)";
  37.  
  38.  
  39.  script_description(english:desc["english"]);
  40.  
  41.  summary["english"] = "Determines if the remote DNS server handles malformed names";
  42.  script_summary(english:summary["english"]);
  43.  
  44.  script_category(ACT_GATHER_INFO);
  45.  
  46.  
  47.  script_copyright(english:"This script is Copyright (C) 2003 Renaud Deraison",
  48.         francais:"Ce script est Copyright (C) 2003 Renaud Deraison");
  49.  family["english"] = "Misc.";
  50.  family["francais"] = "Divers";
  51.  script_family(english:family["english"], francais:family["francais"]);
  52.  
  53.  exit(0);
  54. }
  55.  
  56.  
  57. function check(str)
  58. { 
  59.   local_var req, r, soc;
  60.  
  61.   req = raw_string(0x00, 0x04,
  62.          0x01, 0x00,
  63.          0x00, 0x01,
  64.          0x00, 0x00,
  65.          0x00, 0x00,
  66.          0x00, 0x00, 
  67.         strlen(str)) + str +
  68.      raw_string(0x00, 0x00, 0x01, 0x00, 0x01);
  69.  
  70.  soc = open_sock_udp(53);
  71.  send(socket:soc, data:req);
  72.  r = recv(socket:soc, length:4096);
  73.  close(soc);
  74.  
  75.  return r;
  76. }
  77.  
  78.  
  79. r = check(str:"localhost");
  80. if(!r)exit(0); # No reply -> quit
  81. if("localhost" >!< r)exit(0); # Does not echo back the query -> quit
  82.  
  83. r = check(str:"../nessus");
  84. if(!r)exit(0);    # No reply -> good
  85. if("nessus" >< r)exit(0); # Did not modify the name -> good
  86.  
  87.  
  88. security_warning(port:53, proto:"udp");
  89.